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/QBFCLOSE/ANNUAL_CONTRACTS..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/ASSIGN_CAUSE..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/ATTENDANCE..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/CALL_VISIT..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/CAR..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/CDM_LOG..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/COC..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/COMPANY..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare function send_event\r\ndeclare subroutine forward_event\r\n\r\nforward_event()\r\nVoid = send_event( CtrlEntId, 'CLEAR' )\r\nreturn 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/CUST_INQUIRY..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/DESIG_ERR_GRP..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/HOTH2O2_LOG..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/INVOICE..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/LAST_WFR_CI_GROUP..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property, send_event, rds_comm\r\n\r\nif rds_comm( 'CHECK_NCR_SAVE' ) then\r\n * DO NOTHING CAUSE THE USER WAS ASKED TO SAVE AND THEY SAID NO BUT WE MUST\r\n return 0\r\nend\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nvoid = send_event( @window, 'CLEAR' )\r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/LISTBOX_CONFIG..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property, send_event, rds_comm\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nvoid = send_event( @window, 'CLEAR' )\r\nRETURN 0\r\n"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/LOSS_CODES..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/MASTER_DISK_LOG..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/MEG_LOG..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/NAMES..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare function post_event, set_property, send_event, fieldcount\r\ndeclare subroutine forward_Event\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm )\r\nfor i = 1 to Acnt\r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n Void = set_property( ThisControl, 'ENABLED', 1 )\r\n end\r\nnext i\t\r\nvoid = post_event( @window:'.SEQ', 'GOTFOCUS', '' )\r\nvoid = set_property( @window:'.SEQ', 'FOCUS', 1 )\r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/NDA..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/ORDER..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/PHOTOFLO_LOG..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/QUARTZ_TC_LOG..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/QUARTZ_WAND_LOG..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/QUOTE..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event, set_property\r\ndeclare function send_event, fieldcount\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nreturn 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/QUOTE_OLD..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event, set_property\r\ndeclare function send_event, fieldcount\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nreturn 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/QUOTE_SRL..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event, set_property\r\ndeclare function send_event, fieldcount\r\n\r\nforward_event( CtrlEntId, CtrlClassId )\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nreturn 0\r\n"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/RDS..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property, send_event, rds_comm\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nvoid = send_event( @window, 'CLEAR' )\r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/RDS_POST_EPI..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property, send_event\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nvoid = send_event( @window, 'CLEAR' )\r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/RDS_PRE_EPI..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property, send_event\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nvoid = send_event( @window, 'CLEAR' )\r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/RDS_PRE_EPI_ORG..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property, send_event\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nvoid = send_event( @window, 'CLEAR' )\r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/RDS_UNLOAD..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property, send_event, rds_comm\r\n\r\nif rds_comm( 'CHECK_NCR_SAVE' ) then\r\n * DO NOTHING CAUSE THE USER WAS ASKED TO SAVE AND THEY SAID NO BUT WE MUST\r\n return 0\r\nend\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nvoid = send_event( @window, 'CLEAR' )\r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/REACTOR_LOG_AREV..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event( CtrlEntId, CtrlClassId )\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/REACT_ITEMS..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/REACT_PROBS..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/REACT_PROB_CAT..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/RECIPE..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\n\r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/SCHEDULE..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/SCHEDULE_SRL..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event( CtrlEntId, CtrlClassId )\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/SEMI_LOG..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/SPC_CLEAN_HF..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/SPC_CLEAN_HF_AKRION..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/SPC_CLEAN_HF_ETCH..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/SPC_CLEAN_HF_ETCH_AKRION..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/SPC_CLEAN_SC1..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/SPC_CLEAN_SRD..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/SPC_EVAL_4PP..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/SPC_EVAL_ADE..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/SPC_EVAL_FTIR..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/SPC_REACTOR_PARTICLES..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/SPC_WAFER_ETCH..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/SRP_COC_RESULTS..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/SRP_INCOMING_LOG..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/SUB_REC_LOG..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/TW_CODES..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/TW_PRIME_USAGE..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/TW_USAGE..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/WAFER_INV..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/WO_LOG..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}

11
LSL2/OIEVENT/QBFCLOSE/WO_VERIFY..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "declare subroutine forward_event\r\ndeclare function fieldcount, set_property\r\n\r\n* NOT ACCESSIBLE VIA THE MAIN MENU AS OF NOW - JUST WANTED TO \r\n* HAVE THE CODE IN PLACE IN CASE WE DECIDE TO CHANGE THE INTERFACE LATER\r\n\r\nforward_event()\r\nAllControls = utility( 'OBJECTLIST', @window, '' )\r\nAcnt = fieldcount( AllControls, @fm ) \r\nfor i = 1 to Acnt \r\n ThisControl = AllControls<i>\r\n if ThisControl[-6,6] = '_LABEL' or index( ThisControl, 'MENU', 1 ) or index( ThisControl, 'TEXT', 1 ) else\r\n void = set_property( ThisControl, 'ENABLED', 1 )\r\n end \r\nnext i \r\nRETURN 0"
}
}
}