added remaining LSL2 entities

LSL2/OIEVENT/CLEAR/ANNUAL_CONTRACTS..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/ASSIGN_CAUSE..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/ATTENDANCE..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/CALL_VISIT..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/CAR..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function fieldcount, utility, send_event, set_property, msg, post_event\r\ndeclare subroutine forward_event\r\n$insert logical\r\n$insert msg_equates\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/CDM_LOG..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/COC..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/COMPANY..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function set_property, utility, fieldcount\r\ndeclare subroutine forward_event\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/CUST_INQUIRY..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function fieldcount, utility, send_event, set_property, msg, post_event\r\ndeclare subroutine forward_event\r\n$insert logical\r\n$insert msg_equates\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/DESIG_ERR_GRP..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/HOTH2O2_LOG..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/INVOICE..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/LAST_WFR_CI_GROUP..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property, rds_comm\r\ndeclare SUBROUTINE Comm_RDS, Forward_Event\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\n\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\nForward_Event()\r\n\r\nComm_RDS('Refresh')\t;* Added 08/23/2004 by JCH\r\n\r\nRETURN 0"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/LOSS_CODES..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/MASTER_DISK_LOG..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/MEG_LOG..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/MSG_GROUPS..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/NAMES..json

@@ -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\t   \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\nreturn 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/NCR..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function fieldcount, utility, send_event, set_property, msg, post_event\r\ndeclare subroutine forward_event\r\n$insert logical\r\n$insert msg_equates\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/NDA..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/ORDER..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/PHOTOFLO_LOG..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/QUARTZ_TC_LOG..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/QUARTZ_WAND_LOG..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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\n  \r\nnext i \r\nRETURN 1\r\n\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/QUOTE..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function fieldcount, utility, send_event, set_property, msg, post_event\r\ndeclare subroutine forward_event\r\n$insert logical\r\n$insert msg_equates\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/QUOTE_OLD..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function fieldcount, utility, send_event, set_property, msg, post_event\r\ndeclare subroutine forward_event\r\n$insert logical\r\n$insert msg_equates\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/QUOTE_SRL..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function fieldcount, utility, send_event, set_property, msg, post_event\r\ndeclare subroutine forward_event\r\n$insert logical\r\n$insert msg_equates\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/RDS..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property, rds_comm\r\nDECLARE Subroutine Comm_RDS\r\n\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\nComm_RDS('FirstRefresh')\r\nRETURN 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/RDS_POST_EPI..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property, rds_comm\r\nDECLARE Subroutine Comm_RDS\r\n\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\nComm_RDS('Refresh')\r\nRETURN 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/RDS_PRE_EPI..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property, rds_comm\r\nDECLARE Subroutine Comm_RDS, Forward_Event\r\n\r\n\r\n\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\nForward_Event()\r\n\r\nComm_RDS('Refresh')\r\n\r\nRETURN 0"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/RDS_PRE_EPI_ORG..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property, rds_comm\r\nDECLARE Subroutine Comm_RDS, Forward_Event\r\n\r\n\r\n\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\nForward_Event()\r\n\r\nComm_RDS('Refresh')\r\n\r\nRETURN 0"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/RDS_UNLOAD..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property, rds_comm\r\ndeclare SUBROUTINE Comm_RDS, Forward_Event\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\n\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\nForward_Event()\r\n\r\nComm_RDS('Refresh')\t;* Added 08/23/2004 by JCH\r\n\r\nRETURN 0"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/REACTOR_LOG_AREV..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/REACTOR_PM..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/REACT_ITEMS..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/REACT_PROBS..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/REACT_PROB_CAT..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/RECIPE..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/SCHEDULE..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/SCHEDULE_SRL..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/SEMI_LOG..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/SPC_CLEAN_HF..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/SPC_CLEAN_HF_AKRION..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/SPC_CLEAN_HF_ETCH..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/SPC_CLEAN_HF_ETCH_AKRION..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/SPC_CLEAN_SC1..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/SPC_CLEAN_SRD..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/SPC_EVAL_4PP..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/SPC_EVAL_ADE..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/SPC_EVAL_FTIR..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/SPC_REACTOR_PARTICLES..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/SPC_WAFER_ETCH..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/SRP_COC_RESULTS..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/SRP_INCOMING_LOG..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/SUB_REC_LOG..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/TW_CODES..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/TW_PRIME_USAGE..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/TW_USAGE..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/TW_USE..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "DECLARE FUNCTION Comm_TW_Use\r\n\r\nRETURN Comm_TW_Use(CtrlEntID,'CLEAR')"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/WAFER_INV..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/WO_LOG..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function utility, fieldcount, set_property\r\n\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 1\r\n"
+        }
+    }
+}

LSL2/OIEVENT/CLEAR/WO_VERIFY..json

@@ -0,0 +1,11 @@
+{
+    "header": {
+        "version": 1,
+        "type": "record"
+    },
+    "body": {
+        "record1": {
+            "<1>": "declare function fieldcount, utility, send_event, set_property, msg, post_event\r\ndeclare subroutine forward_event\r\n$insert logical\r\n$insert msg_equates\r\n\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 1"
+        }
+    }
+}