phares3757/open-insight
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

added remaining LSL2 entities

Browse Source
This commit is contained in:
Infineon\StieberD
2024-03-25 15:12:53 -07:00
parent 15b25a611c
commit 81e4baccb1
4474 changed files with 99825 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
LSL2/OIEVENT/CLICK/CAR.RMA_BUTTON.json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare function msg, dialog_box\r\n$insert msg_equates\r\n\r\nOrigVal = .rma_info1->array:char(244):.rma_info2->array:char(244):.rma_special_inst->text:char(244):.rma_eng_comments->text\r\nReturnVal = dialog_box( 'CAR2', @window, OrigVal )\r\nif ( ReturnVal <> OrigVal ) and ( ReturnVal <> 'CANCEL' ) then\r\n if ( ReturnVal = 'REMOVEALL' ) then\r\n .rma_info1->array = @fm\r\n .rma_info2->array = str(@fm,4)\r\n .rma_special_inst->text = ''\r\n .rma_eng_comments->text = ''\r\n .rma_button->text = 'Define RMA Info...' \r\n end else\r\n\t RmaInfo1 = field( ReturnVal, char(244), 1 )\r\n\t RmaInfo2 = field( ReturnVal, char(244), 2 )\r\n\t convert @vm to @fm in RmaInfo2\r\n\t RmaSpecialInst = field( ReturnVal, char(244), 3 )\r\n\t RmaEngComments = field( ReturnVal, char(244), 4 )\r\n\t .rma_info1->array = RmaInfo1\r\n\t .rma_info2->array = RmaInfo2\r\n\t .rma_special_inst->text = RmaSpecialInst\r\n\t .rma_eng_comments->text = RmaEngComments\r\n .rma_button->text = 'Edit RMA Info...'\t \r\n end\r\n @@window->savewarn = 1 \r\nend\r\nRETURN 0"
}
}
}